home *** CD-ROM | disk | FTP | other *** search
/ Quick PC 62 / Quick PC 62.iso / I386 / IIS5_01.CAB / IIS_ClientScript_VBScript.asp < prev    next >
Encoding:
Text File  |  1998-05-29  |  1000 b   |  37 lines

  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3.  
  4. <!*************************
  5. This sample is provided for educational purposes only. It is not intended to be 
  6. used in a production environment, has not been tested in a production environment, 
  7. and Microsoft will not provide technical support for it. 
  8. *************************>
  9.  
  10. <!-- Define client-side scripting function to display to user. -->
  11. <!-- Note that server-side scripting is being used to dynamically -->
  12. <!-- construct the return message. -->
  13.  
  14. <SCRIPT LANGUAGE = VBScript>
  15.     Sub Doit()
  16.         MsgBox "Your ASP SessionID is:" & <%= Session.SessionID %>
  17.     End Sub
  18. </SCRIPT>
  19.  
  20.  
  21. <HTML>
  22.     <HEAD>
  23.         <TITLE>Client-Side Scripting</TITLE>
  24.     </HEAD>
  25.  
  26.     <BODY BGCOLOR="White" TOPMARGIN="10" LEFTMARGIN="10">
  27.         
  28.         <!-- Display header. -->
  29.  
  30.         <FONT SIZE="4" FACE="ARIAL, HELVETICA">
  31.         <B>Client-Side Scripting</B></FONT><P>   
  32.  
  33.         <INPUT TYPE=Button VALUE="Click Here" ONCLICK=Doit>
  34.         
  35.     </BODY>
  36. </HTML>
  37.